* lisp/master.el (master-says): Check nil argument (bug#70230).

diff --git a/lisp/master.el b/lisp/master.el
index 0caf4d7963fc70b31270110c6a72cb7f15e44ec9..9151ca212d1099311c871eac6bcad56d25102483 100644 (file)
--- a/lisp/master.el
+++ b/lisp/master.el
@@ -136,6 +136,8 @@ See `recenter'."
 (defun master-says (&optional command arg)
   "Display slave buffer and execute COMMAND with ARG in its window."
   (interactive)
+  (unless master-of
+    (error "Current buffer is not a master of any other buffer"))
   (if (null (buffer-live-p (get-buffer master-of)))
       (error "Slave buffer has disappeared")
     (let ((window  (selected-window)))